From 04e7d4954dc59a902244d1612d7707bf69d1b8e2 Mon Sep 17 00:00:00 2001 From: Thien-Thi Nguyen Date: Mon, 12 Jun 2006 07:50:58 +0000 Subject: [PATCH] (hack-local-variables-confirm): Display string value using its printed representation. --- lisp/files.el | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/lisp/files.el b/lisp/files.el index b4bc8f9ffec..91f857dd2ec 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -2406,7 +2406,11 @@ n -- to ignore the local variables list.") (insert " "))) (princ (car elt) buf) (insert " : ") - (princ (cdr elt) buf) + (if (stringp (cdr elt)) + ;; Make strings with embedded whitespace easier to read. + (let ((print-escape-newlines t)) + (prin1 (cdr elt) buf)) + (princ (cdr elt) buf)) (insert "\n")) (setq prompt (format "Please type %s%s: " -- 2.30.2